/*
 * CHECAR E CORRIGIR A VARIVEL DE DATA
 */

/* Checa se existem datas no preenchidas */
PROC FREQ
	data=alura.cadastro_produto_v2;
	table data /missing;
RUN;

/* Checa quais jogos no possuem data preenchida */
DATA teste1;
set alura.cadastro_produto_v2;

WHERE data = .;

RUN;

/* Confere preenchimento das datas nas demais cpias dos jogos */
PROC FREQ
	data=alura.cadastro_produto_v2
		(where=(nome in ("Soccer" "Forgotten Echo" "Fireshock")));
	table nome*data
		/list missing;
RUN;

/* Corrige a data */
DATA teste2;
set alura.cadastro_produto_v2;

IF data = . THEN DO;
	SELECT(nome);
		WHEN ("Fireshock")		data = 201706;
		WHEN ("Forgotten Echo")	data = 201411;
		WHEN ("Soccer")			data = 201709;
		OTHERWISE;
	END;
END;

RUN;

/* Salva uma nova verso da base de cadastro produto */
DATA alura.cadastro_produto_v3;
set teste2;

* Cria a flag de lanamento ;
IF data > 201606
	THEN flag_lancamento = 1;
	ELSE flag_lancamento = 0;

* Marca o rtulo da flag ;
label lancamento = "Marca 1 para jogos que so lanamento e 0 caso contrrio";

RUN;

/* Checa se todas as datas esto preenchidas */
PROC FREQ
	data=alura.cadastro_produto_v3
		(where=(nome in ("Soccer" "Forgotten Echo" "Fireshock")));
	table nome*data
		/list missing;
RUN;

/* Compara flags de lanamento entre as verses 2 e 3 */
PROC FREQ
	data=alura.cadastro_produto_v2;
	table flag_lancamento;
RUN;

PROC FREQ
	data=alura.cadastro_produto_v3;
	table flag_lancamento;
RUN;



